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, both 
languages overlap Consderatly in ther apoicabons, and 4 you 
only have one language in your Apple, you can perform an 
amazing variety of tasks without ever missing the other language 


Unfortunately, there are v3nificant syntax differences between 
the two languages, and to convert a program from one to the 
other, you must know these differences: 


INTEGER APPLESOFT 
TAB HTAB 
РОКЕ 50,62 INVERSE 
РОКЕ 503127 FLASH 
РОКЕ 50,255 NORMAL 
CALL -ዋ2ል HOME - 
> OR #inot =) <> > 
X MOD Y Х-ІМТ(Х/Ү) Y 
X/Y INT (X/Y) 
RND (X) INT(RND(1)#X) 
AS(LEN(AB)+1)= ሰፄ=ልፄ+ 
à OX) MIDS (АФ, X, 1) 
А (4, 6) MID$(A$; 4,3) 
А% (1,3) LEFT$ (AS, 2) 
NEXT’ X NEXT 
GOTO ፅሄ100 ON а GOTO 100,200... 
60508 A*100 ON à GOSUB 105,200... 


INPUT"WHAT?",W — INPUT"WHAT";W 


ሙራ መ መ —À— — —— ባክ ዝጽ ጣመ — чш — — ሙዖ “መ= — —À — — — ዝመጽ — —— че жш — — Я еВ 


Other Differences: (1) АЯ ASC values are lower by 198 іп Applesoft 
although PEEK(-16384) returns the higher number in both 
languages. (2) If an IF statement is NOT true, Applesoft will NOT 
tead the rest of а program line (a BIG difference!). (3) Аррюзой 
has many more commands than Integer, and integer has à few not 


available іп Applesoft. Check your Beagle Bros. COMMAND CHART. 
It lists ай commands and their functions. 
To convert to Applesoft with a disk systea-- 
1. Add these lines to your Integer prograa: 
32764 и” REN (CTRL-D) 
12785 PRINT 09; "NOMON C, 1,0*: PRINT М; 
“OPEN CONVERTFILE*: PRINT D$; 
"WEITE CONERTEILE*: CALL-974 


22266 PORE 53,127 1. Correct all syntax. 
12747 LIST 6, 32763: PRINT BS; "CLOSE": 2. 662 the lises at the 
ም суды left to your progrès 
шы WITHOUT LIME злы. 
$. FP cr) 22754 

(cr? 

$. EXEC COWERTFILE (cr) ех * 
S. Correct all syntax. 88 recossend 5. EXEL CONVERTFILE (cr? 


Roger Wagner^s КРАЕ ИС Ий to 
sate this task mech во пере. 


16 COLORS = 6 

Perhaps you've noticed how some lores colors look the same as 
each other on а black & white monitor. = 2-Blue ines with а 

= 4-Green background might look fine in color, but be hard to 
see in B/W. Good computer graphics should work BOTH WAYS. 


have the same black & white shade. 
.COLOR А BAWSHADE 
0 Black 0 Black 
1 Magenta 1 Dark Grey 
9 Dark Blue 1 
4 Dark Green 1 
8 Brown 1 
5 Grey 9 Solid Grey 
10 Grey 
3 Lavender 3 Med. Grey 
6 Med. Blue 
9 Orange 3 
19 Bright Green 3 
7 Light Blue 4 Light. Grey 
11 Pink 4 
13 Yellow 4 
14 Aqua 4 


~> j| HOW DENSE 

-- ARE YOU? 
Here's a little exercise that may tell you you need a little exercise. 
What it does is calculate and list the pounds per inch of height for 
up to 9 people. Try it for different-sized folks (the dog & cat, too) 
and compare. 

The Integer version uses decimal quotients, explained elsewhere 
in this book. The Applesoft version (quite a bit simpler with string 
arrays) prints to the screen with a “typing” noise, also do-able in 
Integer. 


Remember your old 15-numbered Whatchamacallit 
with the sliding numbers? Wait till you play with a 
computerized one! Completely keyboard controlled, 
Slippery Digits features full-color graphics and different 
degrees of difficulty, complete with music signals when 
you're on the right track and disappearing numbers 
when you're not! Each level's scores are kept in 
memory so players can compare their skills. Not as easy 
as it might seem. Slippery Digits is a proven winner for 


all ages! Disk $12.00 
Cassette $10.00 
(16K, Integer or Applesoft) 
BEAGLE BROS. COMMAND CHART 
INCLUDED WITH EACH ORDER! 


ORDER FORMS ON PAGE 17 


50 REM szzz=========zzzszz 
DENSITY (Applesoft) 


522222=22=2=2=222225222= 
55 DIM ፅ5(20)፤ TEXT : HOME 
70 PRINT "LET'S FIND OUT HOW DEN 
SE YOU ARE... *: HTAB 20: PRINT 


74 REM === GET DATA zz 
T3 Y * 1 + 1; IF X > 20 THEN 135 
МАМЕ AND 


"RETURN’ KEY.": PRINT : PRINT 


d FIMISHED, HIT "RETURN" 0 
80 па 3 5: HTAB 21: PRINT *----- 
% тй 4: ип куткан 
100 Мы ቼዝ HTAB 20: hieu мо 


105 IF A$(1) = ** THEN 135 
104 IF LEN (ለ(1)) > 7 THEN 80 


08 
110 m 8: PRINT * (IN POUNDS 


115 ТТ! | * HIS OR HER 
Ито - БЕГІН 
120 HER 12: PRINT ° (ІНІМЕ 


125 VIRB 10: INPUT ° HIS OR HE 
R ዘ፻16ዘ1-›"1ዘ(፤) 
130 HOME : GOTO 75 
133 REM === PRINT DATA === 
135 HOME : PRINT "МАМЕ WEIGHT 
— DENSITY” 


150 PRINT *——————- = 2... 


መሙ --------......-.. 


155 FORT = 1 TOX- 1: VIABI + 
160 ыы 11 = А601): 60508 100 
162 НТАВ 9:79 = STR$ (ID +" 
LBS.": 60508 1 
15 НТАВ 18:16 = sm (ntn + 
BOSUB 1000 


Ы 73 
170 НТАВ 25:18 = STRE (I 
ክን Wu ГНО) + » ) 0 
* LBS./IN.*: 60508 1000 


реа EN 1 NEXT 


........ መመመመወመመሙው መሙሙፍ 


መሙ ------------...% 


END 
1000 REM === TYPING NOISE === 
1005 UE т) LEN (T$): PRINT 
MID ( ң 
[10 FOR U Q 1 O 15 = PEEK ( - 


1 И 
1020 FOR ሀ = | TO 33: NEXT : NEIT 
+ RETURN 


DENSITY integer) 


55 DIN AS(20), $20), CV (20) „06 
(20) ,E$(20] ,F$(20] )84(2201,ዘ8 
(20), 18420) ,9$19) ,W(9), ዘ 


65 TEXT : CALL -934 

70 PRINT LET'S የከ FIND OUT HOW DENSE 
YOU ARE..." TAB 20: PRINT 

74 REM === GET DATA 7^ 

75 m ደ ны THEN 1 

78 [ለዩ 7 NT “ТҮРЕ миє AND HIT 

AB 9: PRINT 


1 VT 
"IF FINISHED, "RETURN" ONL 


80 УТАВ 5: TAB 20: PRINT *-------* 
Е VIAR 4: PRINT “NANE OF PERSON 
100 VIAB 4: TAB 20: INPUT 0% 
105 ፲፻ йге THEN 135: IF 866 
)›? THEN 80 


108 60508 500%1: CALL -ፃ58 

110 VTAB 8: PRINT а: „POUNDS, 32 
5 MAX., NO FRACTIONS)" 

115 VTAB 6: INPUT " HIS OR HER WEI 
BHT-2*,W(T): IF ዘ(1))325 THEN 


120 УТАВ 12: PRINT * — (IN INCHES, М 
FRACTIONS)" 
125 VTAB ም al ° HIS OR HER HE 


DATA ።።። 
135 CALL -936: PRINT "NAME", "WEIGHT" 
"НЕТЕТ", “DENSITY 
150 bait MM —— 
155 FOR 151 TO 1-1: VTAB X42 

160 5058 n: PRINT и, на) 


ГДЕ ዘ(፤ 

19 hu 0/100 ща ዘ00 100;* LBS/ 
: NEXT 
И Е. ааа 
— Ë 
501 A$=0$: RETURN 
Е ИН 604 PRINT 05,፣ RETURN 
805 PRINT E$): RETURN 

504 04-04: RETURN 
505 E$=0$: RETURN 606 PRINT F$,1 RETURN 
505 F$=0$; RETURN 607 PRINT 6$,: RETURN 
507 64-09: RETURN 608 PRINT H$,: RETURN 
508 мей RETURN 509 PRINT [$,: RETURN 
509 I$:0$: RETURN 
301 PRINT Гар: RETURN 
802 PRINT B$,: RETURN 
603 PRINT C$,: RETURN 


DON’T DRINK AND COMPUTE! 

Computers provide great party entertainment, but BEWARE of 
liquid-whatever getting onto and into your keyboard (not to 
mention cigarette ashes, toothpicks, cracker crumbs, cat hair . . .). 


A Solution: Obtain a 15” x 18” piece of 1/4” clear plastic, and 
cover your keyboard like 50 ... 


! 
ee throug”: Нас. E лози ) 
y aem x18" x №" Clear Plastic 
<= -- 2"x12" x 5" Wood Block 
or Box (heavy) 


and enjoy the party! 


192837583748372834828 
523456 AUTO 1938478 RUN 
DEL 512H9 DEL 54119Р, 562 
HIMEM: НТМЕМ: НТМЕМ: HIMEM: 
HIMEM: HIMEM: HIMEM: НТМЕМ: 
HIMEM: HIMEM: НІМЕМ: HIMEM: 


TAKE OUT THE GARBAGE! 2 
Got some Integer lines numbered greater than 32767 that you'd 
like to delete? Or eight pounds of unwanted НІМЕМ at the end 
of a program? Try this to remove them. The line number should be 
just above the highest line you want to keep. 


32767 РОКЕ 76. PEEK (220): POKE 77 
‚ PEEK (221): END 


Now, GOTO 32767. 


To remove garbage from the beginning of a program, the line 
below might work, depending on your garbage. Make the line 
— one number less than your first good program line 

n 2 


50 РОКЕ 202, PEEK (220): POKE 
203, PEEK (221): END 


GOTO 50. Good luck! 
6 


‘Alpha Printer 


Hours of lo-res sketching fun and titling possibilities from 
Beagle Bros.! In the typing mode, you can directly input 
giant color text characters 7 GR plots high to the 
screen while a completely moveable flashing cursor 


leads the way. In the drawing mode, lo-res lines are 
drawn via the keyboard in any color. In both modes, a 
trace scanner lets you change colors of ANY SELECTED 
SCREEN AREA to any other color! 


Commands: D = DRAWING (lo-res lines mode). T= TYPING (giant 
letters mode). В = BLOW UP (enlarge an area). Е = FAST/SLOW 
(line generation speed). S = SCANNER (changes any color in a 
cursor-specified area). L = LINES (connects 2 points). С = COLOR 
(type or draw іп 16 colors + rainbow!). SPACE = DRAW/NO 
DRAW (for moveable cursor). ARROWS = CURSOR (up, down, left 
right). Еш ERASE (clear screen in any color). S & L= SAVE & 
LOAD (screen image to disk or tape), ESC = OPTIONS (display 
commands). 


, 


Use Alpha Printer to create graphs, titles ог drawings 
(we love to just PLAY with it!). Any lo-res image may be 
appended to your programs via disk. 


Disk $16.00 
Cassette $14.00 
(16K, INTEGER ONLY) 


BEAGLE BROS. COMMAND CHART 
INCLUDED WITH EACH ORDER! 


ORDER FORMS ON PAGE 17 


АМ APPLEBOARD 


if you're using а 15" or bigger TV monitor with your Apple, you 
will probably agree with us that placing it on top of the computer 
puts it much too close to your eyes (И only your arms were longer 
-. .). And your desk isn't deep enough to leave room for the TV 
behind the Appie. AND it's a pain trying to type while you look 
sdeway, nsn 

ОК, cut a piece of 3/4” plywood like so. 


2 


Арре pe аллаға келмес. 
сап overhang the front T 
of your desk, and AP 


Beagle Bros: real-time Apple maze game! 

Each player moves his or her own name through a 
constantly-changing maze towards five targets. Maze 
gates are opened and closed through keyboard 
commands to gain access to targets or to strategically 
block an opponent. Ай moves are time-limited to keep 
the game moving. Players input the game clock's speed 
as well as their names, abilities and target information 
to make each game unique. Your Apple adds its own 
touches with extensive sound effects, an animated 
clock and a constantly visible scoreboard. All move and 
gate commands are presented with player names and 
move / gate requests. 

Wowzo is а strategy game you can grow with. Add it 
to your Apple library! 


Disk $16.00 
Cassette $14.00 

(16K, Integer or Applesoft) 
BEAGLE BROS. COMMAND CHART 
INCLUDED WITH EACH ORDER! 


ORDER FORMS ON PAGE 17 


10 КЕМ INTEGER FLASH SUBROUTINE 
Y BERT KERSEY 


в 
DIM 8340) :FLASH=1000 
CALL -936 

ХТАВ- RND (10)41:YTAB= RND 
(219%2: УТАВ 15 ТАВ 1 

PRINT “TYPE SOMETHING: "2 УТАВ 
YTAB: TAB XTAB: INPUT AS 


ЖҰРТ 


A$: GOSUB FLASH 
FOR CHR=1 TO LEN(AS) 

XPOS- PEEK (16)-1+ХТАВ 

YPOS=28 PEEK (37)-1 

COL= SCRN(XPOS-1*CHR, YPOS) 
COLOR=CoL-4 

IF COL>11 THEN COLOR*COL-8 
1050 PLOT XPOS-1*CHR, YPOS 

О NEXT CHR: RETURN 

For clarification of what goes on here, read the following— 


85092 


widely publicized, wil flash characters ASC 199 and above (А 

through Z and shift M, N & P). But what about flashing numbers, 

spaces and punctuation? 

A SOLUTION: As we ай know, Apple's lores colors have 
characters in the text mode. Hit RESET or type TEXT 


tre 


E Em 
ii| 


ааа 


KT! 


COLOR 


two corresponding lores colors: 


„7 Here is а chart showing each standard Appie text character and its 


се-ттееоекеейд8230 
crameneree..yiA» 


$-—:39—"94. лаф. 


ዬወፎህኑ:ጋ> Хмм | 


4 ооошь Ох... sx. 3 2 ር) 
ወ”።ሮመሮስአማግጣጭህ ም 6ይ .. . V ቨ ላዶ 
ድ-፡ фии. ws 
ቤዬዉፎህሁኡ ጋ> муми | 
2መህይጩ መጨ ох. ቼ .# 1Х0 
ә-етелокее .. .ቕ . K" እ 
а: фе Ие. +. .” 


& Скины» $ ጆ ው »ለ)..) r< | 
24ወህይዕጩኤጨ'2፳ሄጀ.፣፡ 8 ጄ ር) 


O-""^"*"^"eo^""an"nauaanan) 


screen, let's approach 


"A" at VIAB 1, TAB 1, the hard 


on the 


ys 3% 
о = 
| kt 
š (а. 
855.77 
[1-7 
рз 265 
„се 
Hp 


99 END 


RUN it. Get the picture? Try this: 


(continued on next page) 


11 


10 TEXT 1 CALL -926 
20 VTAB 10: PRINT “SHE SAID, "YOU ር 
AN’ T PRINT QUOTE MARKS!’ 
20 COLOR=2: PLOT 10,18: PLOT 29 
+18 
99 END 
The apostrophes іп Line 20 have an upper color of 7 and а lower 
color of 10. Line 30 changes the upper color to 2 and produces 
Quote marks (upper color 2, lower color 10). Change Line 30's 
COLOR to 11 to produce + 5, or to 15 to get / 5. 


To find plotting coordinates X and Y for a text character at TAB (or 
HIAB) XT and УТАВ YT, use X = XT + 1 and У = 2*YT-2 (upper half) 
or Y = 2*YT-1 (lower half). 


10 TEXT : CALL -936 
20 PRINT "FLASH: 12248" 
20 COLOR-7: HLIN 7,11 AT 1 


99 END 
Une 30 changes the lower color of ай the numbers from 11 to 7 
and produces numbers. COLOR = 3 would 


10 TEXT : CALL -956 

20 FOR N=1 TO 5 

30 УТАВ М: PRINT "AMOUNT #";N; 
"97777?" 

40 COLOR=13: HLIN 10,14 АТ 28ኩ- 
1 


50 УТАВ М: TAB 10: INFUT А 
60 УТАВ М: TAB 10: PRINT “: "А; 
А "3 CALL -958 
99 NEXT М: END 
Now you're on your own! As you сап see, апу character сап бе 


< a ta 24 кш m. ты ыб ሚ ባውን 
PLAYER #3: TAR 


FIRE LASE 
/ 


(ACTUAL GRID SIZE) 


ю 11 12 1 
01 12 13 1 


DEUNA N Ц wisely aN pfe BANAAN HR: TNO SOONERS ИРА 


BEAGLE BROS. LO-RES/TEXT 


Plotting Pads! 
E 
Ж Now you can accurately pre-plan your text and graphics screen 
layouts on Beagle Bros.' custom Apple graph sheets! Exact 
relationships between your GR plots and TEXT characters сап be 
planned prior to programming with guaranteed results! 


Ж You can create lo-res drawings precisely to scale without the 
distortion and confusion that results from using normal graph 
paper. 

“Ж Each text grid is divided into its two graphics plotting points 
and appropriately numbered for both modes for quick 
reference — VTAB 1-24, ТАВ/ НТАВ 1-40, GR 0-39 & 0-47. 


К Printed in non-repro blue on 8%х11 stock 


50 SHEETS PER PAD 
ORDER FORMS ON PAGE 17 № $4.00 cach 
13 


140 viad Z3: 188 шел * ТРЕ PRO 


*or whatever sendi your Apple to BASIC 


Executing the above will (1) CATALOG your disk (maximum 17 


2 


я 


27 “йз, 
- - 
"MT EET 


Su ыж -)" 


130 па 24: PRINT * 1 PRESS "RETURN 


аў 
THAG-. 
ils. 
5 


Find the invisible subs оп your Apple color 
graphics scope before your oxygen and fuel run out! 
Use your deep-sea scanner switch and watch for the 
blips that give clues to each sub's whereabouts. А 
scan-tracer shows you where you have looked, and if 
you are unable to locate all subs, the computer reveals 
their locations in comparison to where you have 
searched. A final score printout lets you compare your 
Success with others. 


ORDER FORMS ON PAGE 17 


DO SOMETHING MEAN TODAY! 
While strolling by someone's Appie, reach over, POKE 33,90, and 
keep walking. No permanent damage wil be done (RESET cures 
68), but LiSTing а program will be, let's say, interesting Other 
POKEs to try to temporarily mess things up are— 
POKE 50,99; РОЖЕ 50,250 and РОЖЕ 50,197 

Beagie Bros. are not responsible for any possible repercussions 


THREE APPLE ERROR MESSAGES 


%%% SYNTAX ERR integer 
?5УМТАХ ERROR 
SYNTAX ERROR 00$ 


Disk $12.00 
Cassette $10.00 
(16K, integer or Applesoft) 


BEAGLE BROS. COMMAND CHART 
INCLUDED WITH EACH ORDER! 


A Contest! 


ОК, Gang, our Uncie Louie only has an 0.6K Apple and needs 
some programs for it. So here's а contest—-Let's heip him out! 


RULES: Programs must be written in Applesoft or Integer BASIC 
only, and be NO LONGER THAN TWO PROGRAM LINES. There is no 
кей to the number of multiple statements on or length of each 
iine, 65 long as we can type them and not get а “+++ TOO LONG 
ERR” message. Please submit legbie copy. Nothing can be 


Неге are а couple of 9-liners we found in an old trunk in the attic: 
жіп 


mum 

1 318 a — 
IVLABCDEFGHIJKLINOPERSTUVNI 

1 МШЕ -16304,0: РОКЕ -16302 


° 
2 bepets IF 8)25 DEN ізін» 
1: FOR 1-1 18 ለ/ፃ; PRINT ° ° 


| 
| 
| 
| 
| 


песе» Cassette Dist 
) ALPHA PRINTER “и. 
) алг и: зи 
} CORN ым #2 914 
) ELEveToRs 60 52 
) BANG-PERSON “ 512 
) BASIC Pace 512 si 


) QUICK-DRAW! 9 112 
) SLIPPERY DIGITS $10 $12 
) SUB SEARCH 610 512 
) TEITTRAIN и $16 
)TIC TAC ное" $10 812 


I 

፪ 

{ 

| 

t 

{ 

I 

{ 

f } PICK-A-PAIR $9 112 
| 

| 

| 

t 

( 

( ) TRIPLE DIGITS #910 $12 
( 
( 


1 ዘ0100' и 515 

| COMMAND CHART, FREE w/Bases 

each 

{ } PLOTTING PAD $4.00 

( ) EXTRA CATALOG & TIPS $1.50 

SUB ТА...., МӘ БОРБЕ 

+81 SALES TAT (СА alp) e 

*SHIPPING (Check 664) 5  . 
፤ ) First Class 61.0 

t ) 25 52.09 
(OVER) 


( J Personal Oct 
( 1 Nosey Order (fastest) 
1 } RasterCaresvise 


Mail to: BEAGLE BROS. 
4315 Sierra Vista 
San Diego, CA 92103 


(714) 296-6400 


88 шш шш ки es ee АП orders processed immediately. 888 m m ua በጄ ዘጠ ዘጠ ሸጠ ዘጠ D ዘመ an m m m E 


ORDER FORM 


Check Language: 
( ) Integer Basic 
( ) Applesott 
1 ) 1 have 07И, 


Circle-) Cassette Bist 
(o) MPRA PRINTER $4 55 
1 ) кке #2 si 
(o) CORN Game $12 515 
፤ ] АРТ 510 $12 
{ ) MAG-PEtRSUN $10 512 
1 ) MIC FAX $2 514 
1 ) RASTER FIIO $10 912 
t ) one $10 512 
1 ) PICE-A-PAIR 510 $12 
( ) QUICY-DRAW' $10 %2 
( | SLIPPERY DIGITS $10 512 
[1 | SUB SEARCH 510 512 
{ ) TENTTRAIN $14. 1105 
( ) TIC TAC FOOEY! $10 $12 
{ ) TRIPLE DIGITS 510 512 
( ) wowo! “4 515 
( ) COMMAND CHART, FREE м/бавез 


or $2.50 each 
( ) PLOTTING PAD $4.00 
£ ) EXTRA CATALOG & TIPS $1.50 
ЭЛ э» «ә » »» ኢር........ 
+81 SALES TAE (CA only) _...... 
+SHIPPING (Check бле! 
t ) First Class $1.00 
1 } WS $2.0 


፲በጂ......... 


ፌሬ 
(OVER) 
{ ) Personal Chech 


፤ ) Rosey Order (fastest) 
1 ) гй ба ПИЗА 


май to: BEAGLE BROS. 
4315 Sierra Vista 
San Diego, СА 92103 


(714) 296-6400 


| Check Ones 


BEAGLE BROS. - MasterCard 


4315 Serra Vista 
San Diego, CA 92103 


ACCOUNT NO. 
EXPIRATION DATE 


ADDR€* TELEPHONE 


СтТуве SIGNATURE: 


Check Опе: 
BEAGLE BROS. . MasterCard 


4315 Sierra Vista ; š _ VISA 
San Diego, СА 99103 


ACCOUNT NO. 
NAME $= EXPIRATION DATE 


TELEPHONE 
ADDR$* 


CITY$= SIGNATURE: 


_ SINCE ! му 
^ BEAGLE ጄ COMMAND 
- CHART, ГУБ ACQUIRED 
NEW УМ AND ИФОВ! 


ж 
“АЛ unsoloted endorsement 


Beagle Bros. Command Chart! 


Hey! With each Beagle Bros. game order, you will receive а 
copy of our super-handy Apple 8 COMMAND CHART! This 
11" x 17” heavy duty poster contains an alphabetical display 
of ай Applesoft, integer, and Disk commands and their 
functions; all in the same place at the same time (Hooray!)! 


STATEMENT OF QUALITY: 


Our programs are FUN to use. > 


Our instructions are 


RESET PROTECTION! 

In the olden days (computer terminology for last June), a 1/4" 
error when hitting RETURN could cause you to hit RESET and kil а 
program. The new Apples require а two-handed" CTRL-RESET 
Hooray! A terrible flaw is eliminated! For those of us with our 
кю! Apples, here are some soko 

1. Ask your Appie dealer There are several hardware RESET 
protectors for sale, including a deale that requires two RESET hits 
within à second and а RESET switch that attaches to the back of 
your Appie 

2 Make your own RESET protector 


Ss 


] 


L—RESET KEY 


Let's forgive Apple for one BLUNDER! 


* Ow теңін», Kereem Abdul Murphy, сап Go а СТІ AESET with one папа 


ШШШ ВЕЛ Сие BUCKS 
ЕЕРЕЕ 


- መክ сс) 
STITT Lee 


For all you ELECTRIC TRAIN fans, here's TextTrain! You 
completely control а text-format freight train on your 
Apple's video layout! Forward, reverse, track switches, 
coupling & uncoupling, the works! Switching and 
coupling strategies become critical as you are timed by 
an on-screen clock while you attempt to couple 
together a pre-defined trainioad of goods. A Freight- 
On-Board chart constantly updates your cargo. 

If you avoid а game-ending colision and complete 
your assignment, your train will be inspected and your 
time recorded and posted for comparison on future 
tries. For one or more players, this one will keep you 
up till next Wednesday! 


Disk $16.00 
Cassette $14.00 

(16K, Integer or Applesoft) 
BEAGLE BROS. COMMAND CHART 
INCLUDED WITH EACH ORDER! 


ORDER FORMS ON PAGE 17 


ENTERING MACHINE CODE: 


As beginners, we were frustrated when presented with even a 
simple Assembly Language program in a magazine, because we 
just DIDN'T KNOW HOW ТО TYPE IT IN! Well, here's how! 

This simple (and useless) ittie program prints flashing, normal & 


inverse fonts on the screen. 

0800- AO FF LDY #*FF 

0802- 88 DEY 

ово5- 98 TYA 

0804- 20 ED FD JSR $FDED 

0807- 98 TYA » 
овов- Do FB BNE $0802 

OBOA- 60 RTS 


Or, you might see R ike this- 


0800- АО FF 88 98 20 ED FD 98 
0808- DO FB 60 2A 2A 2A 2A 2A 


Here's how you enter this program- 
First, CALL -151 (return) to enter the monitor. This wil produce an 
asterisk and а cursor. Now type- 


800: АО FF 88 98 20 ED FD 98 DO F8 60 


and hit return. That's it! Now go back to BASIC with RESET. To run 
the program from BASIC, CALL 2048 (decimal 9048 = hex 800, the 
number of the 1st program iine). To list it, type CALL -151 (return) 
and 8004. (return). 


WHY DOES THIS DO THIS? 

»LIST JLIST 

10 REM WHY THIS? 

15 REM (INTEGER) 10 REM AND THIS? 

20 сан, 956: GR 20 REM (APPLESOFT) 

20 COLOR» RND (1ፊ)+1 50 FOR X = Г TO 255 

40 N= RND (1280) 40 PRINT CHR® (X) 

50 H=N MOD 22 50 КЕМ BOMBS WITH Сомма, 
60 VsN/32 BUT NOT WITHOUT! 


70 PLOT H,V 70 NEXT 
80 GOTO 34 


LIST 


У REM 222222222222222222222 


RANDOMRACE' (Integer) 


2=52=2522522522222582722 


é REM -> This is a race between a 


red dot and a white dot, both 
propelled by the Apple randos 


generator. 
9 REM -) Points are deterained by 


the vertical coordinate value 
of each dot. ist one to 
wins. Place your bets' 


42 W=W+ RND (3)-1: ІРІ THEN 
Mel: IF ዘ(4 THEN ሄ።4 


54 &z-1:8-8*1: GOTO 60 
57 &=R-1:B-W+l 


1: 
50 IF BDA THEN 66 

63 COLOR=2: VLIN В, AT 1 

bb IF 420% THEN 72 

ዕፃ COLOR=7: ин 492,36 ል! 1 
72 WT-P THIS: 891-39 T9 15-8 


12 01831999: 68 7$ PORE 50, 6719722 (ВРТСИРТ) 

15 CAL -ፃ2: VIAS 24; TAB 14 7B ІР ሀ71(999 OR ፳71)871+4 OR 

18 PRINT "OMIM: *1818፥1(""; ህ1(871-4 THEN 54 

21 FOR 1=0 Т0 39: (.98።1 81 PRINT **;: SEM (CIRL-6 BEEP) 

24 из 38,39 AT 39-1 м па 22: TAB ! 

27 ርጺመ-ቱ: IF Row THEN 87 PRINT ° 89: "87." ላ; 
ር8ቹ፡55-1: FOR 7፡1 10 8 * rat primiata ) 


+ 7 

Pick-a-Pair 
Pick-a-Pair is Beagle Bros: version of the old 
"Concentration" matching game. Apple-fied and ready 
to play. Match the symbols behind the numbers to 
score. Beeps, buzzes and players' names enhance the 
scorekeeping, and full-color graphics and no-return 
keyboard input, makes this an easy-to-play, FUN-to-play 
computer game. 
A great Apple demo game for non-computerers (you 
have noticed THEM, haven't you?).! 


Disk $12.00 
Cassette $10.00 

(16K, Integer or Applesoft) 
BEAGLE BROS. COMMAND CHART 
IMCLUDED WITH EACH ORDER! 


ORDER FORMS ON PAGE 17 


Pork out with Oinki—an exciting and nerve-raciang dice 
game with unpredictable results. The tame will never 
win well, not USUALLY! Sound effects, dice 
graphics, player names and two-key operation make 
this one of our most popular games! 

Disk $12.00 

Cassette $10.00 

(16K, Integer or Applesoft) 


BEAGLE DROS. COMMAND CHART 
INCLUDED WITH EACH ORDER! 


A Beagle + Bros.color version of Hangman! 
— , Two ways to play: 
= — (1) You type a secret word, 
5 and the computer turns 
E it into blanks for someone 
Е} eise to guess, or (2) You 
ЖҚ try to guess the computer's 
1 > word from over 200 
|! he has stored (по 
repeats!) 
Disk $12.00 
Cassette $10.00 
(16K, Integer or Applesoft) 


BLAGLE BROS. COMMAND CHART 
INCLUDED WITH EACH ORDER! 


ORDER FORMS ON PAGE 17 


THINGS THAT GOSUB IN THE NIGHT 
Around 2 am., а CTRL-G can sound like an air raid dren. And 
even 


INVERSE REM STATEMENTS! 


We sure wish we knew how, but we don't. However, here 15 а 
short cut to making your REM statements show up— 

First POKE 33,32 (Integer) or POKE 33,98 (Applesoft). Then your 
REM statements will LIST formatted the way you type them (POKE 
33,40 or RESET before LISTing). We like to underline our REMS with 
hyphens t 


like so: 
#151 JLIST 
370 INPUT I 970 INPUT X 
980 IF 120 THEN PRINT "FIl2LE* 880 IF 1 = 0 THEN PRINT “FITZLE* 
990 REM REN 
EXPLOSION: EXPLOSION: 


1000 IF 1፡86 THEN PRINT "KA-BOON'" 1000 IF І = 86 THEN PRINT *KA-BODR'* 
Experiment, and you'll see what we mean. 


AN EFFICIENT SOFTWARE FILE 
- П СИР OFF THESE CORNERS 
AND YOUR WRITE-PROTECT 
NOTCHES WON'T GET 
CAUGHT. 


X 


ез PAZ 
ЭЖ 


f. 


FILE NAME VIOLATIONS 


The DOS 3.2.1 Manual says that file names must start with a letter, 
Forget it! If you have Neil Konzen's Program Line Editor and DON'T 
have a lower case adaptor, you can include lower case characters 
in 6 file name that will appear as non-letter characters on the 
video screen. For example, a lower-case О” will appear as a "$," 
etc. So it's easy to call a file “$ REPORT” or "* LISTING" OR 

"9% + &@ BILLS." If you want to indent a file name in your 
catalog, a lower-case “(0)” is a space! Here are the equivalent 
upper and lower case characters: 


UC. LC Uc ке UC. tx: 
A ! J . 5 3 
В " K + T 4 
ር = L à U 5 
D $ M a ሃ 6 
Е % N š w 7 
F & о / x 8 
G ን P 0 y 9 
H ( Q 1 2 
I ) R 9 @ sp. 


By the way, if you don't have the Program Line Editor disk, go buy 
one now. It's worth every penny! 


Flashing and inverse file names are also possible with this little 
trick: In immediate mode, POKE 50,63 (return) or POKE 50,197 or 
FLASH (return). Then PRINT “FILE МАМЕ” (return). Then type 
“SAVE” and use cursor moves to trace over your flashing or 
inverse file name and return. CATALOG your catalog, and take a 
look. The only way to load such a program is the same way you 
saved it. Type LOAD or RUN, and trace over the file name with the 
cursor, It works! 
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Р.Е. TIPS 


And speaking of the Program Line Editor ... 

In case you don’t know what it does, you should! First, it allows 
you to edit program lines in NO-TIME compared to what you're 
probably doing now. Second, it has an "Escape Create” function 
that lets you program any key to perform any function. For 
example "ЕС" can LIST a program, “Е5С-Р” can type the word 
“PRINT” for you, "ESC-N" can type "NOW IS THE TIME FOR ALL 
GOOD MEN TO GOSUB 86," ейс., etc. 

How you program your escape functions is a personal thing 
depending on the type of programming you do, but here's the set 
we use. 


ESC FUNCTION ESC FUNCT ION 


----- c መዛ» ብጠ መ ብወ ጠህ መ ብ  — — — —— — — - 


L  TEXT(R)LIST(R) 1 TEXT(RICATALOG DI 
P PRINT ТЕХТ (К) CATALOG 02 
B КОМ) K=PEEK (716384) : IF 
Ж А FOKE -16368,0 

" POKE 50,255 

J POKE 50,062 

5 INT(RND(1)* — ) 
PEEK (716336) + 


t 
В SPACES RIGHT 
(non-recursi ve) 


O-00 0 OL 5 CON 


<- В SPACES LEFT CALL-936 
(non-recursive) POKESO, 255 (К) ТЕХТ (К) 
САШ_-956 (К) 


CALL-151 (К) 
сЕгі-Ү (exit monitor) 


(R)=Return 


Notice that the last 12 functions use the TOP ROW of keys. We 
have labels on our Apple just above the number keys so we don't 
forget what's what. 


Ей. BF 
QUOTE 


MARKS! 
Applesoft— |^ HOME 


20 PRINT "SHE SAID, "ዛና CHR$ (34) 
$"HELLO'"; CHR$ (34) 


Integer— 10 CALL-936 
20 PRINT "SHE SAID, "HELLO! "":END 


No tricks in the Applesoft example. The illegal extra quote marks in 
the Integer program are actually lower case B's! With the P.L.E. 
end without а lower case adaptor, they will appear as quote 
marks on the screen. 
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"Ninth Біооғ-- 
Ladies Hear, Appliances, 
Light Bulbs, Door Knobs, 4 

Hodems, Ергойъ,.," 


Ly 
4 


b.m Elevators! 


You'll need a computer to conquer this one! Four 
elevators in a 12-story color graphics building. The 
object is to see how quickly and efficiently you can get 
rush-hour passengers to the first floor. A real-time 
keyboard challenge for one or two players! 

Disk $12.00 

Cassette $10.00 

(16K, Integer or Applesoft) 


BEAGLE BROS, COMMAND CHART 
INCLUDED WITH EACH ORDER! 


Corn Game 


A great kids’ guessing game 
that sneaks in a little math 
practice without them 
knowing it! With full-color 
graphics of farm animals, 
the object is to guess how 
Y many ears of corn each 
) animal will eat. Probability 
comes into play as it 
becomes evident who the big 
corn-eater is. 


Disk $14.00 
Cassette $12.00 
(16K, Integer or Applesoft) 


BEAGLE BROS, COMMAND CHART 
INCLUDED WITH EACH ORDER! 


ORDER FORMS ON PAGE 17 


DECIMAL QUOTIENTS ІМ INTEGER BASIC! 


Sure you can—within the limits set by 39767. If A/B=C and A and 
В are integers, then let С = (10* A)/B, and PRINT C/10;"'.";C MOD 10. 


>LIST 
10 REM INTEGER DECIMAL QUOTIENTS 
20 CALL -936 
ЗО PRINT “DIVIDE ? EY (3276 


> 
MAX.)"3: TAB B: INPUT А 

40 VTAB PEEK (57): TAB 14 

SO PRINT "EY ? (32767 МАХ.) " 
і: TAB 17: INPUT В 

60 ር=(108ል) /B 

70 VTAB PEEK (37) 

ВО PRINT As" DIVIDED BY "Bs" = " 


:C/10;"."sC MOD 10 
90 PRINT : FOR I=1 TO 666: NEXT 
1: GOTO 30 


Substitute 100's for the 10's if you want 2 place decimals. Just 
remember that 10 *ል ог 100*A can't be greater than 39767. 


RUN COUNTER! (I.B.) 


Here's a little goody that you can add to a program to show how 
many times it's been RUN, Try RUNning it a few times as you see it 
here, and then LIST it. You'll notice that Line 39765 actually 
changes Line 32763 for you! 

5 GOSUB 22762 
10 БЕЛ APPEND INTEGER PROGRAM HERE 


2 N 
32762 HIGHMEM= PEEK (76) + ( PEEK ( 
77)-(% PEEK (77) >127) $256) #256 


32763 CALL -926: VTAB 1: TAB 12 
32764 TURN=1 
52765 PRINT "THIS IS RUN #"3 TURN; 


22756 РОКЕ HIGHMEM—62, TURN+1 
RETURN 
Syntax is VERY important in this one, so be extra careful! 


Renumbering is permissible. Just don't change or add anything 
after "TURN =”. 


Find... 


Yep, you guessed it! They, &. 

old classic, but with AVE መሟ 

numbers! You decide eU 

many the computer should “3 

choose from and whether or not to allow repeat 
numbers. Then put on your deduction cap, and figure 
out the Apple's secret! 


Disk $12.00 
Cassette 910.00 
(16K, Integer or Арріеѕоћ) 


BEAGLE 8205 COMMAND CHART 
INCLUDED WITH EACH ORDER! 


% 


The computer will BEAT your friends 
every time if you want it to (in the 
CHEAT MODE, that is). 

Otherwise, it’s you against the computer 
with a winner every game thanks 
to our special tic-tac-tie breaker 
Outfox the Apple if you can! 
Total points are graphically displayed 
| to determine the ultimate winner 
Disk $12.00 
Cassette $10.00 
(16K, integer or Applesoft) 


BEAGLE BROS. COMMAND CHART 
INCLUDED WITH EACH ORDER! 


ORDER FORMS ON PAGE 17 


PACK МУ BOX WITH 
FIVE DOZEN LIQUOR JUGS. 
Неге is a Ке program that takes letters out of your copy and 


10 REN PACK NY 801 (Applesoft) mY ш ( ) 
и анха m, ам 10 REN PACK = Пай 


15 CAL -ፃ26: A P 
29 FIR T= 110110 = 1:70 + (26) ТА? 
13) = 21: ЖП: ИА 1 PRSTA” "WOO m 


INPUT *TYPE-)*;CoPYs 


a 2 FOR 1-1 TO ІТ ТН 
3 SUM = 0: VA T CALL - 958 )።21፥ MEIT 1: VIA ! 
ИНДЕ S тик: ናባይ w (8) -9 
፥ 2 
(D: PRINT Оз п * 64): NEIT - ፻5 FOR 1-1 TO 25: VIAS S+1-1H 
(1/14): TAS ТЇЇ): PRINT ALPE 
40 ፻ቹ ፤ = ! 10 LEN (Corrs) (1,07: MIT I 
AS NORMAL : VIAB 1: ዘ1ፅ8 6 + I: PRINT 49 FOR 1-1 TO LENICOPYSI 
* *; INVERSE 65 POKE 50,255: VTAB 1: TAB b+ 
50 178 = ASC ( MIDS (ር፻15,1,1)) ї: PRINT * *; 50,63 
- éb: IFLIRCIORLIRO 2 30 LTR- ASCICOPYS(I.1))-192: IF 
& THEN 65 LTRCI OR LTR)26 THEN 85 
SS 9148 8 + LTR- I3 (D (LT ола 84[8-178፪18,/14)፣ таа 
R / 14))፣ HTAB TILTR) + 2 PRINT  T(LTR)+2: PRINT COPYS(T, 
с (LTR + 64 60 TILTA) =T (LTR) 1: SUN-SUM I 


60 TILTR) = ТОТА) + 1:50И = SUN + 65 МЕТ 1: POKE 50, 255: УТАВ 23 
1 ee 15ሀሸ" LETTERS* 


65 КЕП Y: POKE 50,255: УТАВ 23: ፤ 5070 
PRINT “ТОТЫ: ; SUM; LETTER 
S": 6010 20 


Uncle Louie also says that the order in which letters are most 


Four great magic tricks on опе program— 

These four tricks, with a little help from you, will have 
them rolling on the rug. About the time they suspect 
that you (of all people) have something up your cuffs 
and have been pulling some fast ones with your Apple 
(which you have), you turn it over to an audience 
member and the computer still does the impossible! 
Four tricks are included— 

1. PLENTY-QUESTIONS: Think of ап object; the 
computer asks some key questions; the computer tells 
you what your object is. A real cage-rattier! 

2. CARD SCANNER: The computer reads cards through 
the TV screen. Just press any playing card against the 
screen and watch it work! 

3. NEXTWORD: Audience members test their wits on 
this one. Can they figure out what the Apple is up to? 
Most can't. Only you know its secret. 

4. 21 NUMBERS: An Apple switch on a mix-'em-up 
card trick that never fails! 


Disk $14.00 
Cassette $19.00 
(16K, Integer or Applesoft) 


BEAGLE BROS. COMMAND CHART 
INCLUDED WITH EACH ORDER! 


ORDER FORMS ON PAGE 17 


М, 5, W ог Е? 


То move а figure up, down, left or right on the monitor, the U, б, 
L & R or N, S, W & E keys are often used, but are a real pain for 
nontypers. |, M, J & K or some similar grouping aren't much better, 
We prefer this easy to remember, uncrowded set: 


LEFT: < (,) or — (optional) 
RIGHT: > (.) or — (optional) 


Five of these six keys are already marked 
with “arrows” (mark your space bar too, 
if you want), and all are conveniently 
spaced for two-hand use. 


| “> 
ል thinker's game—easy to play but hard-as-heck to win! 
Two players are given thirteen numbers each to 
distribute on the Triple Digits screen layout. Scoring can 
be done in four ways, and your Apple keeps track and 
posts all possibilities. Plan-ahead strategy, both for 
scoring and blocking, is the key to winning at Triple 
Digits. All skill levels enjoy this one. 


Disk $12.00 
Cassette $10.00 

(16K, Integer or Applesoft) 
BEAGLE BROS, COMMAND CHART 
INCLUDED WITH EACH ORDER! 


ORDER FORMS ON PAGE 17 


33 


А real laugher! Actually two games—The Apple types а 
story and you trigger the missing “Buzzwords”, а 
different one for each key; OR you type а story and the 
Apple supplies the Buzzwords. Four stories in memory 
with endiess possibilities, and a "create your own" 
program too 


Disk $14.00 
Cassette 912.00 
(16K, Integer or Арріеѕоћ) 


BEAGLE BROS COMMAND CHART 
INCLUDED WITH EACH ORDER! 


PEA ) * 
7 
г, Quick- 
<: Draw! 
ግ ዓ raw: 
'ፇ Two players control two 
үе full-color gunmen on the 
screen. Flashing code 
symbols tell you when to 
ооё" But don't draw at the wrong time—your gun 
won't fire, and you're іп for а surprise. Rated NV (Non- 
Violent) by the Beagle Bros. staff. Try it anyway! 


Disk $12.00 
Cassette $10.00 

(16K, integer or Арріеѕоћ) 
МАСИ BROS COMMAND CHART 
IMCLUDED WITH LACH ORDER’ 


ORDER FORMS ОМ PAGE 17 


፡2፻፻222222222222522222፳ 2፡5 =:ሙ::5:ጮ፡:2:2:222:95222:25 55:5 26188 52:22 
LO-RES COLOR TEST PATTERN 

by Bert Kersey 

Names & Numbers Colors 

and Classifies by B/W Shade 


====== = = =s zz zz zz zz zz z 5:2 22 ЫЛ 22: сива 25 сас 25 


(Applesoft) (Integer) 

1157 БЕГ 

120 GR: HOME :0 = - 16304 110 DIN 2$ (119) :0=-16584 

130 REM 120 68 : CALL -ፃ2ፅ 
NAMES k NUMBERS: 


140 REM IN LIME 150, PERIODS = 
155 AS = *.1.,2..4..8.,5..2..6..5 


.12..7 11.15.14., 

mai І 

sra BLUGAN, GRY.. BLU. . GRN 

FOR V= 21 10 22: FR I= 1 — 
STEP 3:7 = 40 8 (V - 21) + 


፻ 5 p 1: *(0-R A 
$ 15288)"፤: COLORS 7: PLOT 


3:979 12:1 2 211 
CLASSIFY SY 3/፪ SHADE: 


1 ши! 


| j йт UUSES № US Е 
g 
5 
፦ 
Е 
። 
ሠ 


መመመ ወ ወወ መመ ውውወ ወመ መመ ውሙ ወ ውጭ ወሙ 


140 REM IN LIME 150 * SPACES. 

159 ate "uem ሐ 3..6..9.12,. 
7, 11, 12, 14, , RAGDREDRKBRNA | OLAVRE 
DORGBRTL 1 TPNECYELAQU. . . . BLUGRM. . . 
GRY.. BLU. . .GRMBLU. 


160 FOR 1:21 2” 23: FOR 1፡1 TO 
17 Я у if 
1 MOD 54 AND | MOD 60 THEN 
PORE 50,63 

170 ሃ1ይ8 V: ТАВ lel: PRINT МИП, 
NET TON PORE $0,255 


180 PRINT ° Дара: зи, 


m x 


4...... 


DE THEN COLOR 15- 


ASCII Values for Applesoft & Integer BASIC 


AS INT AS INT ав INT 
сә 0 128 sp 32 160 5 64 192 я 
са 1 129 "55 151 А 63 152 а 
ев 2 130 " 34 162 B 46 194 b 
eC 2121 й 15 145 ር 67 195 с 
ср 4 122 $ 52 154 D 48 195 d 
cE 5152 A 37 165 E 57 197 e 
ЕЕ b 154 & ЗВ 146 Е 70 198 + 
(Bell)cG 7 135 59 147 B 71 199 i 
<-)cH в 136 ( 40 148 H 72 200 В 
сі 9 137 ) 41 149 I 75 201 і 
cJ 10 158 з до 170 3 74 202 j 
cK it 139 + 43 171 К 75 205 k 
| cL 12 140 , 44 172 L 75 204 1 
(БепзеМ 12 141 - 45 172 М 77 205 т 
СМ 14 142 - 45 174 М 78 206 n 
СО 15 145 / 47 175 O79 207 ይ 
cP ié 144 О 48 176 Р ВО 208 р 
єй 17 145 1 49 177 8 Ві 209 q 
cR 18 146 z "50 178 R ве 210 г 
cS 19 147 $ 51 179 5 B3 211 5 
eT 20 148 4 52 180 T 84 212 t 
(->)ፎህ 21 149 5 55 181 0 85 212 и 
cM 22 150 & 54 182 V въ 214 v 
си 23 151 7 55 185 и 57 215 "ና 
ex 24 152 B 56 184 X BB 215 x 
су 25 152 9 57 185 Y B9 217 y 
к ez 26 154 ፡ 58 166 2 90 218 > 
(Esc)c[L 27 155 ; 59 187 [ 91 217 £ 
cN 28 155 5 40 188 X 92 220 : 
cl 29 157 = 41 189 1 93 22 H 
c^ то 158 > &2 190 ж ga 227 * 

ፎ 51 159 ? 65 191 95 222 

mur 


г == 


36 


Кук ка 
oh 
ps 


Poh ድ h ርዲ ዳርዳር Aa ኒ4ርዳዴ4ዴ 


3 


h, 


4ኢነ፦። Oud к, ТЕ 


" 


ғ 


[a 


ከንኮኃ።ኮንኮኃ ኢነኦንኮኢ፲ኮኦ፤ኢገኮ፤ኦንዬንኢገኮ፤ [ንትጋ ኮጋኩን 
DID Дт ОЛ 


— P P фа Is 


ық 


-4 ው he = ID ЕА а = А 


jaa j> pei B реа да pi ъа ра в pi р а ji G 
ымыны ВО ጮ == ji ка іні ይራ ке ሎ መ= | IÀ 


1096 НЕҢ =z==================== 
JACK'S5 TEXT PRIMTER 
tÁpplesoft! 
by Jack Cassidy 


30970 REM Transfers к በር ዩስ copy 


to 
10980 FIRSTLN © |) T1LASTLN = 22; REM 
SET УТАВ TOP k BOTTOM LIMITS 


31000 fit 2: REM OR YOUR PRINTER 


፲1010 ዞጩ 50,255: PRINT 
c E УРЕД = FIRSTLN TO LAST 


31040 FÜR XPSN = | 10 40 

71050 УТАВ ҮРЕЙ: НТАВ IPSN 

31080 ХҮСН = 5ርጸዘ( IPSN - 1,2 1 
(9888 - 1)) + 16 1 50ህ( YP 


SH = 1,2 Y СРМ - 1) + 1) 

31100 ТЕ XYCH < 32 ТЕҢ IYCH = 1 
УСН + 192 

31120. ፲፻ XYCH 4 96 THEM УСН = 1 
УСН + 128 

зїї ДЕ XYCH € 128 THEN 1168 = 


H + 64 
51160 = CHRE ІТҮСНІ; 
21180 IPSN 
31200 PRINT S dd (13); 
31220 МЕЛТ Y 


3000 НЕҢ с:22255:2::шшБыьшашин 
ASCII] SCREEN PRINTER 
(Applesoft) 

3005 : БІЗШЕ 1070; HTAR 12 

1010 PRINT "E ASCII VALUES 1" 

2015 ЖӘ 1070 

2020 PRINT "AS... INT AS... INT 

SP AS... INT" 


3025 МИНГ —-—-—- -------- 
3030 FOR ፤ = 32 10 47 
3035 T = [1 1085 
3080 T = X 16: BUSUB 1045 
2043 ፲ = Д + 32: BÜSUE - 

3050 T = 1 + 4B: a ger 


3065 PRINT Ty" "i CHRS ITI" "ST 
+ 128" "ir RETURN 
3070 FOR 1 = L 0 40: PRINT "="; 
t НЕТ : RETURN 


IMPRESS YOUR FRIENDS! 
(Integer or AS) 
by Uncle Louie 


15 CALL -ፃ26 

19 FOR A=1 TO 100 

23 AMGUMT= АМО (99): REM FOR APPLE- 
SOFT, AMQUNT-INTIRND(I)ES0) 


il PRI 

23 IF 1400 100 THEN PRINT * ፥ *; 
13 SUHSSIMAAMOUNT 

43 МЕГА 

47 PRINT " ш 4, SUNI". = 


51 END 
54 REM Try in both languages, and 
Compare speeds! 


NUMBER ROUNDER 


20 WORE 

20 ШРИ = ANY REAL ШИКІ 
40 INPUT "HOW MANY PLACES?- rat 
Ж a ГЕИ ЕЯ 
ፅዐ PRINT : ROÜUNDED-5";T 
70 PRINT : GOTO 10 


WAKED CITY ілері ее? 1 
by Flo Char 


= же, REM (CTRL-6) 
Ж Š Ото 502 
360 PRINT í INPUT 71/4: REM 
ПЕЗНТЕТ-М) 
102 PRINT “SYNTAX ERROR"; 6% 
997 БОТО 160 


PRINTED ІМ SAN DIEGO 


